100 DIM S(15): C$="[157],": PRINT "[147]";
110 :
120 FOR I=0 TO 15
130 S(I)=PEEK(49155+I)
140 NEXT
150 :
160 READ A$
170 PRINT TAB(20-LEN(A$)/2) A$
180 PRINT "[146]" TAB(13) "DOGS " S(0);
190 FOR I=1 TO 5: PRINT C$ S(I);: NEXT
200 PRINT: PRINT "[145]" TAB(17);
210 INPUT S(0),S(1),S(2),S(3),S(4),S(5)
220 :
230 FOR I=6 TO 15
240 READ A$: PRINT
250 PRINT TAB(17-LEN(A$)) A$ " " S(I)
260 PRINT "[145]" TAB(17);
270 INPUT S(I)
280 NEXT
290 :
300 FOR I=0 TO 15
310 POKE 49155+I,S(I)
320 NEXT
330 :
340 PRINT "[145][145]": END
350 :
360 DATA GHOUL DOG COLOR CHANGE PROGRAM
370 DATA CAT,LASER BEAM
380 DATA SPRITE MULTICOLOR
390 DATA ALTERNATE CAT,FRAME
400 DATA GAME BACKGROUND
410 DATA TARGETS,BONUS TARGETS
420 DATA TEXT,TEXT BACKGROUND